From c7e45cc0c0dc9b89dde35dfddecb9abc9723d20c Mon Sep 17 00:00:00 2001 From: Kenichi Handa Date: Fri, 17 Apr 2009 02:35:52 +0000 Subject: [PATCH] (unidata-get-decomposition): Adjust Hangle decomposition rule to Unicode. --- admin/unidata/unidata-gen.el | 4 +++- 1 file changed, 3 insertions(+), 1 deletion(-) diff --git a/admin/unidata/unidata-gen.el b/admin/unidata/unidata-gen.el index 5a03fd71431..7fecb999d35 100644 --- a/admin/unidata/unidata-gen.el +++ b/admin/unidata/unidata-gen.el @@ -828,11 +828,13 @@ Property value is a character." (L (+ #x1100 (/ char 588))) ;; V = VBase + (SIndex % NCount) * TCount (V (+ #x1161 (/ (% char 588) 28))) + ;; LV = SBase + (SIndex / NCount) * NCount + (LV (+ #xAC00 (* (/ char 588) 588))) ;; T = TBase + SIndex % TCount (T (+ #x11A7 (% char 28)))) (if (= T #x11A7) (list L V) - (list L V T)))) + (list LV T)))) )) -- 2.30.2